Dim scriptName
scriptName = "lyricsplugin"

Dim inip
inip = SDB.ApplicationPath & "Scripts\Scripts.ini"

Dim inif 
Set inif = SDB.Tools.IniFileByPath(inip)

If Not (inif Is Nothing) Then
     inif.StringValue(scriptName,"Filename") = "lyricsplugin.vbs"
     inif.StringValue(scriptName,"Procname") = "lyricsplugin"
     inif.StringValue(scriptName,"Order") = "99"
     inif.StringValue(scriptName,"DisplayName") = "Search for Lyrics using lyricsplugin.com"
     inif.StringValue(scriptName,"Description") = "Searches Lyrics"
     inif.StringValue(scriptName,"Language") = "VBScript"
     inif.StringValue(scriptName,"ScriptType") = "3"
     SDB.RefreshScriptItems
End If
 